home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 1 / Gigarom Macintosh Archives (Quantum Leap)(CDRM1080320)(1993).iso / FILES / DEV / I-Z / RA.cpt / Breakpoints.ra < prev    next >
Text File  |  1986-12-11  |  529b  |  41 lines
  1. |
  2. |  RA™
  3. |  Breakpoint example
  4. |
  5. |   © 1986 COM~LINK & S.Koren
  6. |
  7. #M;
  8. "Program to generate Fibannocci numbers.!"
  9. "Enter max number: " ? A: A. ! "!"
  10. 1 B: 1 C: B .! " "
  11. ( C. ! " "
  12. B. C. + C. B:
  13. ∞             | breakpoint here
  14. C: C. A. < ~)
  15. $
  16. &A
  17. "Hit any key: " ?§ µ @`
  18. |
  19. |  RA title routine
  20. |
  21. &M
  22. #Q,5,5;
  23. #G,10,10;
  24. #L,225,10;
  25. #L,225,105;
  26. #L,10,105;
  27. #L,10,10; 
  28. #O; #P;`
  29.  
  30. &G 1% 2% •0A893º¶ `
  31. &L 1% 2% •0A891º¶ `
  32. &O
  33. 40 100 Ω
  34. "RA™"
  35. 60 40 Ω 
  36. "© 1986/7 COM~LINK & S.Koren" 
  37. 80 60 Ω
  38. "All rights reserved." `
  39. &Q 1% 2% •0A89Bº¶ `
  40. &P ?§ @ µ`
  41. $